home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club (Business) 1997 July / Software of the Month Club - Business (Volume 239) (July 1997).iso / pc / code / intro.dxr / 00003.ls < prev    next >
Encoding:
Text File  |  1996-02-15  |  304 b   |  14 lines
  1. global gHaveNavs
  2.  
  3. on IntroMouseDown
  4.   if the doubleClick then
  5.     exit
  6.   end if
  7.   set H to the mouseH
  8.   set V to the mouseV
  9.   set OBJref to inHotSpot(point(H, V))
  10.   if OBJref <> #empty then
  11.     do(string(getaProp(getaProp(getaProp(gObjects, OBJref), #Action), #down) & "(#" & OBJref & ")"))
  12.   end if
  13. end
  14.